object frmmain: Tfrmmain Left = 239 Top = 120 BorderStyle = bsDialog Caption = 'Context Menu Manager' ClientHeight = 521 ClientWidth = 498 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] OldCreateOrder = False Position = poScreenCenter OnClose = FormClose OnCreate = FormCreate DesignSize = ( 498 521) PixelsPerInch = 96 TextHeight = 13 object PageControl1: TPageControl Left = 8 Top = 8 Width = 481 Height = 473 ActivePage = tsAllfiles TabOrder = 0 object tsAllfiles: TTabSheet Caption = 'Files && Folders' ImageIndex = 5 OnShow = tsAllfilesShow DesignSize = ( 473 445) object Label1: TLabel Left = 8 Top = 8 Width = 457 Height = 33 AutoSize = False Caption = 'Click the checkmark before the item to either enable or disable ' + 'it. To remove it permanently, click '#39'Remove'#39' button below.' WordWrap = True end object vstAllfiles: TVirtualStringTree Left = 8 Top = 40 Width = 457 Height = 209 CheckImageKind = ckXP Header.AutoSizeIndex = 0 Header.Font.Charset = DEFAULT_CHARSET Header.Font.Color = clWindowText Header.Font.Height = -11 Header.Font.Name = 'Tahoma' Header.Font.Style = [] Header.Options = [hoColumnResize, hoDrag] StateImages = SystemImages TabOrder = 0 TreeOptions.MiscOptions = [toAcceptOLEDrop, toCheckSupport, toFullRepaintOnResize, toInitOnSave, toToggleOnDblClick, toWheelPanning] TreeOptions.PaintOptions = [toShowButtons, toShowDropmark, toThemeAware, toUseBlendedImages] OnChange = vstAllfilesChange OnChecked = vstAllfilesChecked OnGetText = vstAllfilesGetText OnGetImageIndex = vstAllfilesGetImageIndex OnInitNode = vstAllfilesInitNode OnResize = vstAllfilesResize Columns = < item Position = 0 Width = 10000 end item Position = 1 Width = 120 end> end object lvdetails: TListView Left = 8 Top = 256 Width = 457 Height = 150 Columns = < item Width = 120 end item AutoSize = True end> ShowColumnHeaders = False TabOrder = 1 ViewStyle = vsReport OnResize = lvdetailsResize end object btnFilesFolders: TBitBtn Left = 389 Top = 412 Width = 75 Height = 25 Anchors = [akRight, akBottom] Caption = 'Remove' TabOrder = 2 OnClick = btnFilesFoldersClick end end object tsNew: TTabSheet Caption = 'New' OnShow = tsNewShow DesignSize = ( 473 445) object Label2: TLabel Left = 8 Top = 8 Width = 457 Height = 33 AutoSize = False Caption = 'Click the checkmark before the item to either enable or disable ' + 'it. To remove it permanently, click '#39'Remove'#39' button below.' WordWrap = True end object vstNew: TVirtualStringTree Left = 8 Top = 40 Width = 457 Height = 369 CheckImageKind = ckXP Header.AutoSizeIndex = 0 Header.Font.Charset = DEFAULT_CHARSET Header.Font.Color = clWindowText Header.Font.Height = -11 Header.Font.Name = 'Tahoma' Header.Font.Style = [] Header.Options = [hoColumnResize, hoDrag] StateImages = SystemImages TabOrder = 0 TreeOptions.MiscOptions = [toAcceptOLEDrop, toCheckSupport, toFullRepaintOnResize, toInitOnSave, toToggleOnDblClick, toWheelPanning] TreeOptions.PaintOptions = [toShowButtons, toShowDropmark, toThemeAware, toUseBlendedImages] OnChecked = vstNewChecked OnGetText = vstNewGetText OnGetImageIndex = vstNewGetImageIndex OnInitNode = vstNewInitNode OnResize = vstNewResize Columns = < item Position = 0 Width = 10000 end> end object btnNewRemove: TBitBtn Left = 389 Top = 412 Width = 75 Height = 25 Anchors = [akRight, akBottom] Caption = 'Remove' TabOrder = 1 OnClick = btnNewRemoveClick end end object tsSendto: TTabSheet Caption = 'Send To' ImageIndex = 2 OnShow = tsSendtoShow DesignSize = ( 473 445) object Label3: TLabel Left = 8 Top = 8 Width = 457 Height = 33 AutoSize = False Caption = 'Click the checkmark before the item to either enable or disable ' + 'it. To remove it permanently, click '#39'Remove'#39' button below.' WordWrap = True end object vstSendto: TVirtualStringTree Left = 8 Top = 40 Width = 457 Height = 369 CheckImageKind = ckXP Header.AutoSizeIndex = 0 Header.Font.Charset = DEFAULT_CHARSET Header.Font.Color = clWindowText Header.Font.Height = -11 Header.Font.Name = 'Tahoma' Header.Font.Style = [] Header.Options = [hoColumnResize, hoDrag] StateImages = SystemImages TabOrder = 0 TreeOptions.MiscOptions = [toAcceptOLEDrop, toCheckSupport, toFullRepaintOnResize, toInitOnSave, toToggleOnDblClick, toWheelPanning] TreeOptions.PaintOptions = [toShowButtons, toShowDropmark, toThemeAware, toUseBlendedImages] OnChecked = vstSendtoChecked OnGetText = vstSendtoGetText OnGetImageIndex = vstSendtoGetImageIndex OnInitNode = vstSendtoInitNode OnResize = vstSendtoResize Columns = < item Position = 0 Width = 10000 end> end object btnSendtoRemove: TBitBtn Left = 389 Top = 412 Width = 75 Height = 25 Anchors = [akRight, akBottom] Caption = 'Remove' TabOrder = 1 OnClick = btnSendtoRemoveClick end end end object btnclose: TBitBtn Left = 330 Top = 488 Width = 75 Height = 25 Anchors = [akRight, akBottom] Caption = 'Close' TabOrder = 1 OnClick = btncloseClick end object btnhelp: TBitBtn Left = 414 Top = 488 Width = 75 Height = 25 Anchors = [akRight, akBottom] Caption = 'Help' TabOrder = 2 OnClick = btnhelpClick end object SystemImages: TImageList Left = 12 Top = 484 end end